home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 7 B / CHIP_HITWARE_7B.iso / Edukacja / Guitar Tuner / Wintun16.dxr / 00033.ls < prev    next >
Encoding:
Text File  |  1997-04-24  |  1.9 KB  |  58 lines
  1. on setVolume
  2.   if field "volume selection" = 7 then
  3.     set the soundLevel to 7
  4.     set the visible of sprite 18 to 1
  5.     set the visible of sprite 16 to 0
  6.     set the visible of sprite 17 to 0
  7.   else
  8.     if field "volume selection" = 6 then
  9.       set the soundLevel to 6
  10.       set the visible of sprite 18 to 1
  11.       set the visible of sprite 16 to 0
  12.       set the visible of sprite 17 to 0
  13.     else
  14.       if field "volume selection" = 5 then
  15.         set the soundLevel to 5
  16.         set the visible of sprite 17 to 1
  17.         set the visible of sprite 18 to 0
  18.         set the visible of sprite 16 to 0
  19.       else
  20.         if field "volume selection" = 4 then
  21.           set the soundLevel to 4
  22.           set the visible of sprite 17 to 1
  23.           set the visible of sprite 18 to 0
  24.           set the visible of sprite 16 to 0
  25.         else
  26.           if field "volume selection" = 3 then
  27.             set the soundLevel to 3
  28.             set the visible of sprite 17 to 1
  29.             set the visible of sprite 18 to 0
  30.             set the visible of sprite 16 to 0
  31.           else
  32.             if field "volume selection" = 2 then
  33.               set the soundLevel to 2
  34.               set the visible of sprite 16 to 1
  35.               set the visible of sprite 18 to 0
  36.               set the visible of sprite 17 to 0
  37.             else
  38.               if field "volume selection" = 1 then
  39.                 set the soundLevel to 1
  40.                 set the visible of sprite 16 to 1
  41.                 set the visible of sprite 18 to 0
  42.                 set the visible of sprite 17 to 0
  43.               else
  44.                 if field "volume selection" = 0 then
  45.                   set the soundLevel to 0
  46.                   set the visible of sprite 18 to 0
  47.                   set the visible of sprite 16 to 0
  48.                   set the visible of sprite 17 to 0
  49.                 end if
  50.               end if
  51.             end if
  52.           end if
  53.         end if
  54.       end if
  55.     end if
  56.   end if
  57. end
  58.